home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 2 / Amiga Tools 2.iso / tex / macros / contrib / umlaute.sty < prev    next >
Encoding:
Text File  |  1995-03-15  |  8.7 KB  |  224 lines
  1. %% 
  2. %% This is file `umlaute.sty', generated 
  3. %% on <1995/3/5> with the docstrip utility (2.2i).
  4. %% 
  5. %% The original source files were:
  6. %% 
  7. %% umlaute.dtx  (with options: `package')
  8. %% 
  9. %% Copyright (C) 1994 Axel Sommerfeldt 
  10. %% 
  11. \NeedsTeXFormat{LaTeX2e}[1994/06/01]
  12. \ProvidesPackage{umlaute}[1994/11/28 v1.2 umlaute package (AS)]
  13. \typeout{Package: umlaute v1.2 <1994/11/28> (Axel Sommerfeldt)}
  14. \newcommand\umlaute@type{0}
  15. \DeclareOption{iso}{\renewcommand\umlaute@type{0}}
  16. \DeclareOption{ansi}{\ExecuteOptions{iso}}
  17. \DeclareOption{850}{\renewcommand\umlaute@type{1}}
  18. \DeclareOption{roman8}{\renewcommand\umlaute@type{2}}
  19. \DeclareOption{amigaos}{\ExecuteOptions{iso}}
  20. \DeclareOption{amiga}{\ExecuteOptions{amigaos}}
  21. \DeclareOption{atari}{\ExecuteOptions{tos}}
  22. \DeclareOption{dos}{\ExecuteOptions{850}}
  23. \DeclareOption{ibmpc}{\ExecuteOptions{dos}}
  24. \DeclareOption{hpux}{\ExecuteOptions{roman8}}
  25. \DeclareOption{macos}{\renewcommand\umlaute@type{3}}
  26. \DeclareOption{mac}{\ExecuteOptions{macos}}
  27. \DeclareOption{tos}{\renewcommand\umlaute@type{4}}
  28. \DeclareOption{windows}{\ExecuteOptions{ansi}}
  29. \DeclareOption{nogerman}{\def\umlaute@nogerman{\empty}}
  30. \ProcessOptions
  31. \ifx\mdqoff\undefined
  32.   \def\umlaute@nogerman{\empty}
  33. \fi
  34. \ifx\umlaute@nogerman\undefined
  35.   \typeout{\space\space\space\space\space\space\space\space\space
  36.            german package detected}
  37. \fi
  38. \newcommand{\umlaut@german}[3]{%
  39. \ifx\umlaute@nogerman\undefined
  40. \global\def#1{#3}
  41. \else
  42. \global\def#1{#2}
  43. \fi}
  44. \ifcase\umlaute@type % iso/ansi
  45.   \catcode`\^^ab=\active \def^^ab{<<}
  46.   \catcode`\^^bb=\active \def^^bb{>>}
  47.   \catcode`\^^c1=\active \def^^c1{\'A}
  48.   \catcode`\^^c2=\active \def^^c2{\^A}
  49.   \catcode`\^^c4=\active \umlaut@german{^^c4}{\"A}{"A}
  50.   \catcode`\^^c7=\active \def^^c7{\c{C}}
  51.   \catcode`\^^c8=\active \def^^c8{\`E}
  52.   \catcode`\^^c9=\active \def^^c9{\'E}
  53.   \catcode`\^^ca=\active \def^^ca{\^E}
  54.   \catcode`\^^cb=\active \def^^cb{\"E}
  55.   \catcode`\^^ce=\active \def^^ce{\^I}
  56.   \catcode`\^^cf=\active \def^^cf{\"I}
  57.   \catcode`\^^d4=\active \def^^d4{\^O}
  58.   \catcode`\^^d6=\active \umlaut@german{^^d6}{\"O}{"O}
  59.   \catcode`\^^d9=\active \def^^d9{\`U}
  60.   \catcode`\^^db=\active \def^^db{\^U}
  61.   \catcode`\^^dc=\active \umlaut@german{^^dc}{\"U}{"U}
  62.   \catcode`\^^e1=\active \def^^e1{\'a}
  63.   \catcode`\^^e2=\active \def^^e2{\^a}
  64.   \catcode`\^^e4=\active \umlaut@german{^^e4}{\"a}{"a}
  65.   \catcode`\^^e7=\active \def^^e7{\c{c}}
  66.   \catcode`\^^e8=\active \def^^e8{\`e}
  67.   \catcode`\^^e9=\active \def^^e9{\'e}
  68.   \catcode`\^^ea=\active \def^^ea{\^e}
  69.   \catcode`\^^eb=\active \def^^eb{\"e}
  70.   \catcode`\^^ee=\active \def^^ee{\^\i}
  71.   \catcode`\^^ef=\active \def^^ef{\"\i}
  72.   \catcode`\^^f4=\active \def^^f4{\^o}
  73.   \catcode`\^^f6=\active \umlaut@german{^^f6}{\"o}{"o}
  74.   \catcode`\^^f9=\active \def^^f9{\`u}
  75.   \catcode`\^^fb=\active \def^^fb{\^u}
  76.   \catcode`\^^fc=\active \umlaut@german{^^fc}{\"u}{"u}
  77.   \catcode`\^^df=\active \umlaut@german{^^df}{\ss}{"s}
  78.   \typeout{\space\space\space\space\space\space\space\space\space
  79.            ISO 8859-1 character encoding selected}
  80. \or % 850
  81.   \catcode`\^^ae=\active \def^^ae{<<}
  82.   \catcode`\^^af=\active \def^^af{>>}
  83.   \catcode`\^^b5=\active \def^^b5{\'A}
  84.   \catcode`\^^b6=\active \def^^b6{\^A}
  85.   \catcode`\^^8e=\active \umlaut@german{^^8e}{\"A}{"A}
  86.   \catcode`\^^80=\active \def^^80{\c{C}}
  87.   \catcode`\^^d4=\active \def^^d4{\`E}
  88.   \catcode`\^^90=\active \def^^90{\'E}
  89.   \catcode`\^^d2=\active \def^^d2{\^E}
  90.   \catcode`\^^d3=\active \def^^d3{\"E}
  91.   \catcode`\^^d7=\active \def^^d7{\^I}
  92.   \catcode`\^^d8=\active \def^^d8{\"I}
  93.   \catcode`\^^e2=\active \def^^e2{\^O}
  94.   \catcode`\^^99=\active \umlaut@german{^^99}{\"O}{"O}
  95.   \catcode`\^^eb=\active \def^^eb{\`U}
  96.   \catcode`\^^ea=\active \def^^ea{\^U}
  97.   \catcode`\^^9a=\active \umlaut@german{^^9a}{\"U}{"U}
  98.   \catcode`\^^a0=\active \def^^a0{\'a}
  99.   \catcode`\^^83=\active \def^^83{\^a}
  100.   \catcode`\^^84=\active \umlaut@german{^^84}{\"a}{"a}
  101.   \catcode`\^^87=\active \def^^87{\c{c}}
  102.   \catcode`\^^8a=\active \def^^8a{\`e}
  103.   \catcode`\^^82=\active \def^^82{\'e}
  104.   \catcode`\^^88=\active \def^^88{\^e}
  105.   \catcode`\^^89=\active \def^^89{\"e}
  106.   \catcode`\^^8c=\active \def^^8c{\^\i}
  107.   \catcode`\^^8b=\active \def^^8b{\"\i}
  108.   \catcode`\^^93=\active \def^^93{\^o}
  109.   \catcode`\^^94=\active \umlaut@german{^^94}{\"o}{"o}
  110.   \catcode`\^^97=\active \def^^97{\`u}
  111.   \catcode`\^^96=\active \def^^96{\^u}
  112.   \catcode`\^^81=\active \umlaut@german{^^81}{\"u}{"u}
  113.   \catcode`\^^e1=\active \umlaut@german{^^e1}{\ss}{"s}
  114.   \typeout{\space\space\space\space\space\space\space\space\space
  115.            PC-850 character encoding selected}
  116. \or % roman8
  117.   \catcode`\^^fb=\active \def^^fb{<<}
  118.   \catcode`\^^fd=\active \def^^fd{>>}
  119.   \catcode`\^^e0=\active \def^^e0{\'A}
  120.   \catcode`\^^a2=\active \def^^a2{\^A}
  121.   \catcode`\^^d8=\active \umlaut@german{^^d8}{\"A}{"A}
  122.   \catcode`\^^b4=\active \def^^b4{\c{C}}
  123.   \catcode`\^^a3=\active \def^^a3{\`E}
  124.   \catcode`\^^dc=\active \def^^dc{\'E}
  125.   \catcode`\^^a4=\active \def^^a4{\^E}
  126.   \catcode`\^^a5=\active \def^^a5{\"E}
  127.   \catcode`\^^a6=\active \def^^a6{\^I}
  128.   \catcode`\^^a7=\active \def^^a7{\"I}
  129.   \catcode`\^^df=\active \def^^df{\^O}
  130.   \catcode`\^^da=\active \umlaut@german{^^da}{\"O}{"O}
  131.   \catcode`\^^ad=\active \def^^ad{\`U}
  132.   \catcode`\^^ae=\active \def^^ae{\^U}
  133.   \catcode`\^^db=\active \umlaut@german{^^db}{\"U}{"U}
  134.   \catcode`\^^c4=\active \def^^c4{\'a}
  135.   \catcode`\^^c0=\active \def^^c0{\^a}
  136.   \catcode`\^^cc=\active \umlaut@german{^^cc}{\"a}{"a}
  137.   \catcode`\^^b5=\active \def^^b5{\c{c}}
  138.   \catcode`\^^c9=\active \def^^c9{\`e}
  139.   \catcode`\^^c5=\active \def^^c5{\'e}
  140.   \catcode`\^^c1=\active \def^^c1{\^e}
  141.   \catcode`\^^cd=\active \def^^cd{\"e}
  142.   \catcode`\^^d1=\active \def^^d1{\^\i}
  143.   \catcode`\^^dd=\active \def^^dd{\"\i}
  144.   \catcode`\^^c2=\active \def^^c2{\^o}
  145.   \catcode`\^^ce=\active \umlaut@german{^^ce}{\"o}{"o}
  146.   \catcode`\^^cb=\active \def^^cb{\`u}
  147.   \catcode`\^^c3=\active \def^^c3{\^u}
  148.   \catcode`\^^cf=\active \umlaut@german{^^cf}{\"u}{"u}
  149.   \catcode`\^^de=\active \umlaut@german{^^de}{\ss}{"s}
  150.   \typeout{\space\space\space\space\space\space\space\space\space
  151.            Roman-8 character encoding selected}
  152. \or % MacOS
  153.   \catcode`\^^c7=\active \def^^c7{<<}
  154.   \catcode`\^^c8=\active \def^^c8{>>}
  155.   \catcode`\^^cb=\active \def^^cb{\'A}
  156.   \catcode`\^^e5=\active \def^^e5{\^A}
  157.   \catcode`\^^80=\active \umlaut@german{^^80}{\"A}{"A}
  158.   \catcode`\^^82=\active \def^^82{\c{C}}
  159.   \catcode`\^^e9=\active \def^^e9{\`E}
  160.   \catcode`\^^83=\active \def^^83{\'E}
  161.   \catcode`\^^e6=\active \def^^e6{\^E}
  162.   \catcode`\^^e8=\active \def^^e8{\"E}
  163.   \catcode`\^^eb=\active \def^^eb{\^I}
  164.   \catcode`\^^ec=\active \def^^ec{\"I}
  165.   \catcode`\^^ef=\active \def^^ef{\^O}
  166.   \catcode`\^^85=\active \umlaut@german{^^85}{\"O}{"O}
  167.   \catcode`\^^f4=\active \def^^f4{\`U}
  168.   \catcode`\^^f3=\active \def^^f3{\^U}
  169.   \catcode`\^^86=\active \umlaut@german{^^86}{\"U}{"U}
  170.   \catcode`\^^88=\active \def^^88{\'a}
  171.   \catcode`\^^89=\active \def^^89{\^a}
  172.   \catcode`\^^8a=\active \umlaut@german{^^8a}{\"a}{"a}
  173.   \catcode`\^^8d=\active \def^^8d{\c{c}}
  174.   \catcode`\^^8f=\active \def^^8f{\`e}
  175.   \catcode`\^^8e=\active \def^^8e{\'e}
  176.   \catcode`\^^90=\active \def^^90{\^e}
  177.   \catcode`\^^91=\active \def^^91{\"e}
  178.   \catcode`\^^94=\active \def^^94{\^\i}
  179.   \catcode`\^^95=\active \def^^95{\"\i}
  180.   \catcode`\^^99=\active \def^^99{\^o}
  181.   \catcode`\^^9a=\active \umlaut@german{^^9a}{\"o}{"o}
  182.   \catcode`\^^9d=\active \def^^9d{\`u}
  183.   \catcode`\^^9e=\active \def^^9e{\^u}
  184.   \catcode`\^^9f=\active \umlaut@german{^^9f}{\"u}{"u}
  185.   \catcode`\^^a7=\active \umlaut@german{^^a7}{\ss}{"s}
  186.   \typeout{\space\space\space\space\space\space\space\space\space
  187.            Apple MacOS character encoding selected}
  188. \or % Atari TOS
  189.   \catcode`\^^ae=\active \def^^ae{<<}
  190.   \catcode`\^^af=\active \def^^af{>>}
  191.   % no \'A and \^A
  192.   \catcode`\^^8e=\active \umlaut@german{^^8e}{\"A}{"A}
  193.   \catcode`\^^80=\active \def^^80{\c{C}}
  194.   % no \`E
  195.   \catcode`\^^90=\active \def^^90{\'E}
  196.   % no \^E and \"E
  197.   % no \^I and \"I
  198.   % no \^O
  199.   \catcode`\^^99=\active \umlaut@german{^^99}{\"O}{"O}
  200.   % no \`U and \^U
  201.   \catcode`\^^9a=\active \umlaut@german{^^9a}{\"U}{"U}
  202.   \catcode`\^^a0=\active \def^^a0{\'a}
  203.   \catcode`\^^83=\active \def^^83{\^a}
  204.   \catcode`\^^84=\active \umlaut@german{^^84}{\"a}{"a}
  205.   \catcode`\^^87=\active \def^^87{\c{c}}
  206.   \catcode`\^^8a=\active \def^^8a{\`e}
  207.   \catcode`\^^82=\active \def^^82{\'e}
  208.   \catcode`\^^88=\active \def^^88{\^e}
  209.   \catcode`\^^89=\active \def^^89{\"e}
  210.   \catcode`\^^8c=\active \def^^8c{\^\i}
  211.   \catcode`\^^8b=\active \def^^8b{\"\i}
  212.   \catcode`\^^93=\active \def^^93{\^o}
  213.   \catcode`\^^94=\active \umlaut@german{^^94}{\"o}{"o}
  214.   \catcode`\^^97=\active \def^^97{\`u}
  215.   \catcode`\^^96=\active \def^^96{\^u}
  216.   \catcode`\^^81=\active \umlaut@german{^^81}{\"u}{"u}
  217.   \catcode`\^^9e=\active \umlaut@german{^^9e}{\ss}{"s}
  218.   \typeout{\space\space\space\space\space\space\space\space\space
  219.            Atari TOS character encoding selected}
  220. \fi
  221. \endinput
  222. %% 
  223. %% End of file `umlaute.sty'.
  224.